(erc-input-message): Replace last-command-char with last-command-event.

diff --git a/lisp/erc/ChangeLog b/lisp/erc/ChangeLog
index bc11adc7f75befb9589b11878ad40d6fed427d2d..aeae366a1d5a470c5c1162ad98baa1b2ea1a6b40 100644 (file)
--- a/lisp/erc/ChangeLog
+++ b/lisp/erc/ChangeLog
@@ -1,3 +1,8 @@
+2009-01-09  Glenn Morris  <rgm@gnu.org>
+
+       * erc.el (erc-input-message): Replace last-command-char with
+       last-command-event.
+
 2009-01-08  Glenn Morris  <rgm@gnu.org>
 
        * erc.el (tabbar--local-hlf): Silence compiler.

diff --git a/lisp/erc/erc.el b/lisp/erc/erc.el
index a1762d84d9454129c5d306a330db2edc2f38f5f7..756ecef14fda1cf6171e8212048807b9b5b9fb7d 100644 (file)
--- a/lisp/erc/erc.el
+++ b/lisp/erc/erc.el
@@ -3708,7 +3708,7 @@ If FACE is non-nil, it will be used to propertize the prompt.  If it is nil,
   (let ((minibuffer-allow-text-properties t)
        (read-map minibuffer-local-map))
     (insert (read-from-minibuffer "Message: "
-                                 (string last-command-char) read-map))
+                                 (string last-command-event) read-map))
     (erc-send-current-line)))
 
 (defvar erc-action-history-list ()